home *** CD-ROM | disk | FTP | other *** search
/ Technotools / Technotools (Chestnut CD-ROM)(1993).ISO / lang_c / cug231 / fork.st < prev    next >
Text File  |  1987-06-17  |  256b  |  14 lines
  1. Class Main
  2. [
  3.     loop1
  4.         10 timesRepeat: [17 print]
  5. |
  6.     loop2
  7.         10 timesRepeat: [23 print]
  8. |
  9.     main
  10.         [self loop1] fork.
  11.         self loop2
  12. ]
  13.  
  14.